extern int lpdp_(doublereal *a, integer *mda, integer *m, integer *n1, integer *n2, doublereal *prgopt, doublereal *x, doublereal *wnorm, integer *mode, doublereal *ws, integer *is);
/*:ref: dcopy_ 14 5 4 7 4 7 4 */
/*:ref: dnrm2_ 7 3 4 7 4 */
/*:ref: dscal_ 14 4 4 7 7 4 */
/*:ref: wnnls_ 14 12 7 4 4 4 4 4 7 7 7 4 4 7 */
/*:ref: ddot_ 7 5 4 7 4 7 4 */
